Fortran 指针赋值

pointer => target

如果进行覆盖赋值，那么前一个自动丢失。也可以在指针之间赋值：

p1 => p2

则会将 p2 的值也赋给 p1；如果其中一个指针在后面的语句中改变，另一个指针不受影响。